home *** CD-ROM | disk | FTP | other *** search
- object WaveNormalizer: TWaveNormalizer
- Left = 376
- Top = 265
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Wave Normalizer'
- ClientHeight = 250
- ClientWidth = 408
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Label9: TLabel
- Left = 268
- Top = 139
- Width = 13
- Height = 19
- AutoSize = False
- Caption = '%'
- Layout = tlCenter
- end
- object Label1: TLabel
- Left = 152
- Top = 139
- Width = 58
- Height = 19
- AutoSize = False
- Caption = 'Normalize to'
- Layout = tlCenter
- end
- object Filelist: TListView
- Left = 8
- Top = 8
- Width = 393
- Height = 121
- OnClick = FilelistClick
- Columns = <
- item
- Caption = 'Filename'
- Width = 275
- end
- item
- Alignment = taCenter
- Caption = 'Size (MB)'
- Width = 80
- end>
- ReadOnly = True
- MultiSelect = True
- OnColumnClick = FilelistColumnClick
- OnCompare = FilelistCompare
- PopupMenu = Popup
- SortType = stText
- TabOrder = 0
- ViewStyle = vsReport
- end
- object Normalize: TBitBtn
- Left = 320
- Top = 136
- Width = 81
- Height = 25
- Cancel = True
- Caption = 'Close'
- Default = True
- ModalResult = 1
- TabOrder = 1
- OnClick = NormalizeClick
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333333333333333333333000033338833333333333333333F333333333333
- 0000333911833333983333333388F333333F3333000033391118333911833333
- 38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
- 911118111118333338F3338F833338F3000033333911111111833333338F3338
- 3333F8330000333333911111183333333338F333333F83330000333333311111
- 8333333333338F3333383333000033333339111183333333333338F333833333
- 00003333339111118333333333333833338F3333000033333911181118333333
- 33338333338F333300003333911183911183333333383338F338F33300003333
- 9118333911183333338F33838F338F33000033333913333391113333338FF833
- 38F338F300003333333333333919333333388333338FFF830000333333333333
- 3333333333333333333888330000333333333333333333333333333333333333
- 0000}
- NumGlyphs = 2
- end
- object RemoveWaves: TBitBtn
- Left = 80
- Top = 136
- Width = 63
- Height = 25
- Hint = 'Remove Wave file(s) from the list'
- Caption = '&Remove'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = RemoveWavesClick
- NumGlyphs = 2
- end
- object AddWaves: TBitBtn
- Left = 8
- Top = 136
- Width = 63
- Height = 25
- Hint = 'Add Wave file(s) to be normalized'
- Caption = '&Add'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- OnClick = AddWavesClick
- end
- object Status: TStatusBar
- Left = 8
- Top = 226
- Width = 393
- Height = 19
- Align = alNone
- Panels = <
- item
- Width = 270
- end
- item
- Width = 50
- end>
- SimplePanel = False
- SizeGrip = False
- end
- object NormPercent: TEdit
- Left = 216
- Top = 139
- Width = 33
- Height = 19
- AutoSize = False
- TabOrder = 5
- Text = '0'
- OnExit = NormPercentExit
- end
- object UDNormalize: TUpDown
- Left = 249
- Top = 139
- Width = 15
- Height = 19
- Associate = NormPercent
- Min = 0
- Position = 0
- TabOrder = 6
- Wrap = False
- end
- object nofi: TGroupBox
- Left = 8
- Top = 164
- Width = 393
- Height = 55
- TabOrder = 7
- object Cancelling: TLabel
- Left = 86
- Top = 36
- Width = 249
- Height = 13
- AutoSize = False
- Caption = 'Cancelling after current file...'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- Visible = False
- end
- object Label4: TLabel
- Left = 8
- Top = 36
- Width = 29
- Height = 13
- AutoSize = False
- Caption = 'Done:'
- end
- object DonePercents: TLabel
- Left = 40
- Top = 36
- Width = 41
- Height = 13
- AutoSize = False
- end
- object DoneProgress: TProgressBar
- Left = 8
- Top = 17
- Width = 377
- Height = 16
- Hint = 'Normalization progress'
- Min = 0
- Max = 100
- TabOrder = 0
- end
- end
- object OpenWaves: TOpenDialog
- DefaultExt = 'WAV'
- FileName = '*.wav'
- Filter = 'Wave files (*.wav)|*.WAV'
- Options = [ofHideReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist]
- Title = 'Open Wave file(s)'
- Left = 152
- Top = 56
- end
- object Popup: TPopupMenu
- Left = 280
- Top = 132
- object Remove: TMenuItem
- Caption = '&Remove'
- OnClick = RemoveWavesClick
- end
- object Selectall: TMenuItem
- Caption = '&Select all'
- ShortCut = 16449
- OnClick = SelectallClick
- end
- end
- end
-